GermanWikipedia - /page/entry.mu

Micron Document

<!DOCTYPE html>

<title>Perl-Modul</title>

</head>

<h1 id="firstHeading" class="firstHeading mw-first-heading">Perl-Modul</h1>

</header>

</div>

Ein Perl-Modul ist eine separate <a href="Komponente_(Software)" class="mw-redirect" title="Komponente (Software)">Komponente</a> eines <a href="Computerprogramm" title="Computerprogramm">Computerprogramms</a>, das in <a href="Perl_(Programmiersprache)" title="Perl (Programmiersprache)">Perl</a> geschrieben wurde.

Ein Modul besitzt seinen <a href="Quellcode" class="mw-redirect" title="Quellcode">Quellcode</a> in einer Moduldatei der Endung <code>.pm</code>, die wiederum ein <code>package</code> beinhaltet, also einen eigenen Namensraum (was allerdings nicht zwingend erforderlich ist); die Struktur des Paketnamens (und damit des Namensraumnamens) spiegelt das Dateisystem wider (sodass das Modul Net::FTP in der Datei <code>Net/FTP.pm</code> liegt). Darüber hinaus ist ein Perl-Modul mit Namensraum als Klasse zu verwenden, falls <a href="Objektorientierte_Programmierung" title="Objektorientierte Programmierung">objektorientierte Programmierung</a> angewandt wird (in Perl sind Namensräume äquivalent mit Klassen, müssen jedoch nicht als solche verwendet werden).

Eine Sammlung von Modulen mit zugehöriger Dokumentation, Build-Skripten etc. bildet eine <a href="Distribution_(Software)" title="Distribution (Software)">Distribution</a>. Die Perl-Community pflegt eine große Sammlung an Paketen etc. auf <a href="CPAN" title="CPAN">CPAN</a>.

Perl als Programmiersprache erlaubt vielfältige Programmierstile. Man kann sowohl ein Modul finden, das prozedural („herkömmlich“, ähnlich wie <a href="C_(Programmiersprache)" title="C (Programmiersprache)">C</a>) geschrieben ist (z. B. Test-Simple), als auch Module mit objektorientierten Schnittstellen (z. B. XML::Parser), und sowohl das eine als auch das andere können ihre Aufgaben effizient erfüllen, da es u. a. auf den Kontext ankommt: In Verbindung mit <a href="Extensible_Markup_Language" title="Extensible Markup Language">XML</a> ist eine objektorientierte Modulschnittstelle sehr viel sinnvoller als z. B. bei einer mathematischen Funktionsbibliothek. Module können auch als <a href="Mixin" title="Mixin">Mixin</a>-Methoden genutzt werden oder ein <a href="Compiler-Anweisung" title="Compiler-Anweisung">Pragma</a> sein (z. B. strict), was dann einen unmittelbaren Effekt auf das Programm hat. Außerdem können Module genutzt werden, um die Syntax der Sprache selbst zu ändern. Module haben meist nur einen Effekt auf den Sichtbarkeitsbereich, in dem sie geladen wurden (meist eine Datei).

Perl-Modulen ist es gemein, eingebettete Dokumentation als <a href="Plain_Old_Documentation" title="Plain Old Documentation">Plain Old Documentation</a> zu besitzen. POD ist flexibel genug, Artikel, Webseiten oder gar Bücher zu schreiben (z. B. Programming Perl), im Gegensatz zu <a href="Javadoc" title="Javadoc">javadoc</a>, das auf die Dokumentation von Klassen spezialisiert ist. Normalerweise folgen die Dokumentationen der Struktur einer <a href="Manpage" title="Manpage">manpage</a>.

Der Code auf dieser Seite basiert auf Perl 5.10.0 und sollte somit auch mit Perl > 5.10.0 ausgeführt werden können. Mit beispielsweise Perl 5.6 können insbesondere die Namensraumbeispiele nicht ausgeführt werden. Es wird (Ausnahmen sind gekennzeichnet) das Benutzen des Pragmas <code>strict</code> vorausgesetzt, was saubereren Code zur Folge hat.

<div class="mw-heading mw-heading2"><h2 id="Beispiele">Beispiele</h2></div>

Eine „Hello-World“-Funktion kann auf verschiedene Weise mit Modulen realisiert werden, wobei es nicht zwingend ist, die Funktion in ein Modul (In Perl eher Namensraum; <code>package</code>) zu packen (im Gegensatz zu <a href="Java_(Programmiersprache)" title="Java (Programmiersprache)">Java</a>); vielmehr kann eine Funktion überall definiert und genutzt werden (in Modulen ebenfalls über Einbindung mit <code>use</code>). Trotzdem ist es aus Gründen der Übersichtlichkeit üblich, die Elemente eines Perl-Moduls in einen Namensraum (<code>package</code>) zu stecken. Eine Hello-World-Funktion sähe so aus:

sub hello(){ print "Hello, World!\n"; }

</pre></div>

<div class="mw-heading mw-heading3"><h3 id="Prozeduraler_Ansatz">Prozeduraler Ansatz</h3></div>

In hello.pm wird die Funktion <code>hello()</code> definiert und implementiert, die im Hauptscript main.pl ausgeführt wird.

main.pl:

<div class="mw-highlight mw-highlight-lang-perl mw-content-ltr" dir="ltr"><pre>#!/usr/bin/perl -w

use strict; # Pragma strict wird genutzt, sodass eine besonders strenge Prüfung durchgeführt wird

use world::hello; # hello.pm world/hello.pm, wobei die Basis-Verzeichnisse, also die Verzeichnis, in denen

# world/ liegen könnte, in einer Pfadvariable namens @INC angegeben sind, die auch das

# aktuelle Verzeichnis enthält

# entweder

hello::hallo();

# oder

hello->hallo("Erde");

</pre></div>

<hr>

hello.pm:

<div class="mw-highlight mw-highlight-lang-perl mw-content-ltr" dir="ltr"><pre>package hello;

# Zeilen mit einem "=" kennzeichnen integrierte PO-Dokumentation.

# Ein POD-Abschnitt endet mit "=cut" und kann an beliebiger Stelle stehen.

=head1 NAME

Hello:World -- DIE Hello-World-Implementierung.

=head1 ZUSAMMENFASSUNG

use Hello::World;

hallo();

hallo("Erde");

=head2 Funktionen

Folgende Funktionen stehen zur Verfügung:

=head3 hallo()

hallo()

hallo($etw_anderes)

=head1 Autor

Otto Normalhacker

=cut

sub hallo(;$)

{

my $etw_anderes = shift @_;

defined $etw_anderes ? print "Hello $etw_anderes !\n" : print "Hello world!\n";

}

return 1; # Jedes Perl-Modul muss einen wahren Wert an den Compiler liefern, sonst gibt es einen Error

</pre></div>

<div class="mw-heading mw-heading3"><h3 id="Objektorientierter_Ansatz">Objektorientierter Ansatz</h3></div>

Objektorientierte Lösungen erfordern in allen Sprachen mehr Code und besitzen eine geringere Effizienz in der Ausführung. Während der Entwicklung ist die Objektorientierung allerdings oft effizienter als eine prozedurale Lösung. In Perl ist die Objektorientierung durch Referenzen (Skalare mit einer Speicheradresse) auf Code und einen Hash realisiert.

main.pl:

<div class="mw-highlight mw-highlight-lang-perl mw-content-ltr" dir="ltr"><pre>#!/usr/bin/perl -w

use strict;

use Hello::World; # Modul liegt in Hello/World.pm

my $hello = new Hello::World; # Objekt erzeugen

$hello->gib_begr_aus; # "Hello world" ausgeben

$hello = $hello->aendere_ding("galaxis"); # Zu begrüßendes Objekt in "Galaxis" ändern und das geänderte Objekt zurückspeichern

my $begr = $hello->begr_in_string; # Begrüßung speichern...

print $begr; # und ausgeben

</pre></div>

<hr>

World.pm:

<div class="mw-highlight mw-highlight-lang-perl mw-content-ltr" dir="ltr"><pre>package Hello::World; # Im objektorientierten Ansatz muss der Namensraum definiert sein, da in Perl jede Klasse ein Namensraum ist

use strict;

use warnings;

#

# Eventuelle

# POD-Inhalte

#

sub new($$) # Prototyp des Konstruktors

{

my $class = shift @_;

if ( exists $_[0] ) # Falls nicht anders angegeben, begrüße "world"

{

my $ding = $_[0];

} else

{

}

my $self = { ding => $ding }; # Hash-Referenz mit Daten wird erzeugt...

bless($self, $class); # ... mit dem Klassennamen "abgesegnet"...

return $self; # ...und zurückgegeben

}

sub aendere_ding($$) # Das Ding ändern, das begrüßt wird

{

my $ding = shift @_;

$self->{ding} = $ding; # Daten manipulieren...

}

sub gib_begr_aus($) # Die erzeugte Begrüßung auf STDOUT ausgeben

{

my $self = shift @_; # Objekt wird wieder angenommen...

print("Hello $self->{ding}!\n"); # ...und ausgegeben.

}

sub begr_in_string($) # Die erzeugte Begrüßung als String zurückgeben, z. B. bei Verwendung mit print()

{

return "Hello $self->{ding}!\n";

}

</pre></div>

<div class="mw-heading mw-heading2"><h2 id="Namensräume_und_Geltungsbereiche">Namensräume und Geltungsbereiche</h2></div>

Ein Perl-Programm hat zur Laufzeit, sofern nicht anders deklariert, den Namensraum <code>main</code> – eine Funktion <code>func1()</code> kann sowohl als <code>func1()</code> als auch als <code>main::func1()</code> gerufen werden; der Wert von <code>$var</code> kann sowohl über <code>$var</code> als auch mit <code>$main::var</code> herausgefunden werden. Es können jederzeit neue Namensräume deklariert und genutzt werden. Variablen, die mit <code>my</code> deklariert wurden, verfügen über keine Namensraumzugehörigkeit und existieren global, jedoch nur innerhalb einer Datei. Variablen, die mit <code>our</code> deklariert werden, verfügen über eine Namensraumzugehörigkeit und existieren völlig global, also auch über Dateigrenzen hinweg, wobei sie allerdings in einer anderen Datei als der mit der Deklaration (also der einbindenden Datei) mit Scope-Resolution-Operator :: und dem Namensraum gerufen werden müssen. In ein und derselben Datei muss eine our-Variable aus fremdem Namensraum nur dann vollqualifiziert (mit :: und Namensraum) gerufen werden, falls im aufrufenden Namensraum bereits eine our- oder my-Variable desselben Namens existiert.

my $var = "foo"; # mit my deklarierte Variablen liegen in keinem Namensraum.

# Ein Rufen mittels $namensraum1::var hat keinen Erfolg, mit $var jedoch überall.

our $var2 = "bar"; # our deklariert eine an den Namensraum gebundene Variable (our ist nur nötig mit strict)

$namensraum2::var3 = 42; # Namensraum existiert noch nicht, wird dabei aber gleich erstellt. (nur, falls strict nicht genutzt wird)

our $namensraum2::var4 = 21; # Mit und ohne strict: Fehler

my $namensraum2::var5 = 23.11; # Fehler, da my nicht namensraumgebunden ist

sub namensraum2::hello_w() { print("Hello World!\n"); } # Geht sowohl mit als auch ohne strict

</pre></div>

<div class="mw-heading mw-heading2"><h2 id="Siehe_auch">Siehe auch</h2></div>

<ul><li><a href="Java_Archive" title="Java Archive">Java Archive</a></li>

<li><a href="Objektorientierte_Programmierung" title="Objektorientierte Programmierung">Objektorientierte Programmierung</a></li>

<div class="mw-heading mw-heading2"><h2 id="Weblinks">Weblinks</h2></div>

Dieser Artikel wurde von <a class="external text" title="Zuletzt bearbeitet am 2025-11-28" href="https://de.wikipedia.org/wiki/?title=Perl-Modul&oldid=261954598">Wikipedia</a> herausgegeben. Der Text ist unter <a class="external text" href="https://creativecommons.org/licenses/by-sa/4.0/deed.de">Creative Commons Attribution-Share Alike 4.0</a> verfügbar, sofern nicht anders angegeben. Für die Mediendateien können zusätzliche Bedingungen gelten.

</div>

</div></div>

</div>

</main>

</div>

</body></html>